home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Click 1 (Special Issue) / fantasy.iso / Demo The Druid King / DemoMap.pak / SEQUENCES_CLS.VS < prev    next >
Text File  |  2001-04-11  |  206b  |  12 lines
  1. // void
  2.  
  3. int Time, Now;
  4.  
  5. while (1) {
  6.   Time = EnvReadInt("/cls");
  7.     Now = GetTime();
  8.     if (Time == Now) { cls(); Sleep(1000); }
  9.     if (Time < Now) Sleep (1000);
  10.     if (Time > Now) Sleep(Time - Now);
  11. }
  12.